home *** CD-ROM | disk | FTP | other *** search
/ MacFormat 2000 July / macformat-092.iso / MacFormat 92 CD / Shareware Plus / Utilities / FolderSynchronizer 1.8.9 / PlugIn / SR / 00031_ScrBtnHScrollPrev.ls < prev    next >
Encoding:
Text File  |  2000-03-23  |  770 b   |  36 lines
  1. on beginSprite me
  2.   global gCurrLog, gTotLog, gAltezzaWind, gBaseWind
  3.   set mySprite to the spriteNum of me
  4.   DrawControlHPrevLog(mySprite)
  5. end
  6.  
  7. on mouseDown me
  8.   global gCurrLog
  9.   set mySprite to the spriteNum of me
  10.   set myBtnUp to the name of member the member of sprite mySprite
  11.   if char 4 to 5 of myBtnUp = "Of" then
  12.     exit
  13.   end if
  14.   set the member of sprite mySprite to BtnDw(myBtnUp)
  15.   updateStage()
  16.   if the optionDown then
  17.     FirstH()
  18.   else
  19.     PrevH()
  20.   end if
  21.   repeat with i = 1 to 4000
  22.     if the mouseUp then
  23.       exit repeat
  24.     end if
  25.   end repeat
  26.   repeat while the stillDown
  27.     if the optionDown then
  28.       FirstH()
  29.       next repeat
  30.     end if
  31.     PrevH()
  32.   end repeat
  33.   set the member of sprite mySprite to BtnUp(myBtnUp)
  34.   updateStage()
  35. end
  36.